home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Belgian Amiga Club - ADF Collection
/
BS1 part 41.zip
/
BS1 part 41
/
parallel-C disk ^1.adf
/
CTYPE.H
< prev
next >
Wrap
Text File
|
1997-12-31
|
853b
|
24 lines
/*
* CTYPE.H
*
* 1.1.0 28-Sep-84 ADC
* 1.1.1 16-Oct-84 ADC added _toupper, _tolower
* 1.1.2 14-Mar-86 ADC changed = to == in iscntrl, isspace
* 1.1.3 11-Feb-87 AET added isxdigit and isgraph
*
*/
#define isupper(c) ('A'<=(c)&&(c)<='Z')
#define islower(c) ('a'<=(c)&&(c)<='z')
#define isalpha(c) (islower(c)||isupper(c))
#define isdigit(c) ('0'<=(c)&&(c)<='9')
#define isxdigit(c) (0x0<=(c)&&(c)<=0xF)
#define isgraph(c) (041<=(c)&&(c)<=0177)
#define isalnum(c) (isalpha(c)||isdigit(c))
#define isspace(c) ((c)==' '||(c)==9||(c)==10||(c)==13||(c)==12)
#define isascii(c) ((c)<0200)
#define iscntrl(c) ((c)<040||(c)==0177)
#define isprint(c) (040<=(c)&&(c)<=0176)
#define ispunct(c) (isprint(c)&&!isalnum(c))
#define _toupper(c) (islower(c)?(c)-'a'+'A':(c))
#define _tolower(c) (isupper(c)?(c)-'A'+'a':(c))